home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1996 #15 / Monster Media Number 15 (Monster Media)(July 1996).ISO / tbbs / prgsourc.zip / HOMES.ZIP / FUPD.PRG < prev    next >
Text File  |  1995-12-31  |  349b  |  13 lines

  1. SET COLOR TO GR+/N
  2. @ 5,11 GET status PICTURE "@K"
  3. @ 7,11 SAY "$"
  4. @ 7,12 GET price PICTURE rJust("@K 9999999") 
  5. @ 9,17 GET ac PICTURE "@ Y"
  6. @ 10,15 GET heatpump PICTURE "@ Y"      
  7. @ 11,23 GET heat PICTURE "@K"
  8. SET COLOR TO BG/N
  9. @ 16,3 GET memo1 PICTURE "@K"
  10. @ 17,3 GET memo2 PICTURE "@K"
  11. @ 18,3 GET memo3 PICTURE "@K"
  12. SET COLOR TO GR+/N
  13.